home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / Amos / AMOSList-1097 / AMOSLIST / text0139.txt < prev    next >
Encoding:
Text File  |  1998-06-24  |  2.7 KB  |  87 lines
  1. On 13-Oct-97, MtL ManUtd scribbled:
  2.  
  3. >I tried this using my Viewtrek but its didnt worked! hmm still that
  4. >stupid file selector was coming up..
  5.  
  6. What selector do you mean???
  7.  
  8. >Then i tried viewing jpgs with fast jpg and then it worked. I think
  9. >it must be the viewtrek program that dont want 2 understand the exec 
  10. >line!
  11.  
  12. Are you using 1.3, 2.x or 3.x??? Amos Pro V1 or 2 etc.
  13.  
  14. Anyway,  try  this out, it might just be what you're looking for. It's
  15. worked  fine  for  me  everytime. So I hope you have no probs. (It may
  16. require Kick2.x)
  17.  
  18. BTW Check the VT dox and make sure you have all LIBS etc present :)
  19.  
  20. onwards....
  21.  
  22. '----------SNIP HERE---------------
  23. '
  24. ' ********************************
  25. ' *    Amos ViewTek Viewer!!!    *
  26. ' * bY Andy Gibson for Amos List *
  27. ' *      © - Who cares????       *
  28. ' ********************************
  29. '
  30. Proc _VIEWPIC["C:VT","RAM:piccy"]
  31. '
  32. '
  33. Procedure _VIEWPIC[COMM$,FILE$]
  34.    '
  35.    ' Just some err trapping...not really required...
  36.    If Exist(COMM$)=0 : Bell : Edit : End If 
  37.    If Exist(FILE$)=0 : Shoot : Edit : End If 
  38.    '
  39.    ' Put Amos to back. If you have CRAFT, you could also use the
  40.    ' WB To Front command to make sure WB is at the front when you
  41.    ' flip Amos to back, thus hiding any other WB apps running :^)
  42.    '
  43.    Amos To Back 
  44.    '    
  45.    COMMAND$=COMM$+" "+FILE$+Chr$(0)
  46.    Dreg(1)=Varptr(COMMAND$)
  47.    Dreg(2)=0 : Dreg(3)=0
  48.    XEXECUTE=Doscall(-222)
  49.    '
  50.    If Not Amos Here : Bell : Amos To Front : End If 
  51.    Amos To Front 
  52.    
  53.    '
  54. End Proc
  55. '
  56. '----------SNIP HERE---------------
  57.  
  58. Save  the  above  to disk as something like FILE.asc and use the Merge
  59. Ascii  from the Project menu in Amos Pro. Sorry if I'm patronising you
  60. m8, just trying to help... ;^)
  61.  
  62. Yyou  could  maybe  add some kind of loop with a Multi Wait command so
  63. that  all  processor time is given back to the system when in WB. This
  64. should  make  VT  run smoother also. And one more thing, try opening a
  65. CLI  window  and  printing  some  text  to it to tell peeps that VT is
  66. loading a piccy etc.
  67.  
  68. Use  Easylife  for Iconify or Amcaf, GUI Etx's etc for other great CLI
  69. commands.
  70.  
  71. Lemme know how you get on also.
  72.  
  73. ttfn, Andy Gibson.
  74.  
  75. -- 
  76.  ___________________________________ ________________________________
  77. |  _     _                          |                                |
  78. | (-)/\//_)\/    AGAS Productions   |    #cONTACT mE fOR mORE iNFO#    |
  79. |   Gibson_/           9T7          |    #oN aREA51 rELEASES aLSO!#    |
  80. |                                   |                                |
  81. |    andy@agasinc.demon.co.uk       |        cOMING sOON'ish         |
  82. |                                   |        *Roswell Gfx Adv*         |
  83. |     -=<(aka SKiDZ/A51)>=-         |              9T7               |
  84. |___________________________________|________________________________|
  85.  
  86.  
  87.